CEDET (srecode-create-dictionary): Avoid obsolete object name

* lisp/cedet/srecode/dictionary.el (srecode-create-dictionary):
Don't use a symbol as an object name.  Reported by Pierre Lorenzon.

diff --git a/lisp/cedet/srecode/dictionary.el b/lisp/cedet/srecode/dictionary.el
index 97d3310a2aed830b52c199bfe05c221d4c6c84d6..27e730f9d6ac545915d64fa6a6b98ae64c25cd7f 100644 (file)
--- a/lisp/cedet/srecode/dictionary.el
+++ b/lisp/cedet/srecode/dictionary.el
@@ -195,8 +195,8 @@ associated with a buffer or parent."
              initfrombuff t)))
 
       ;; Create the new dictionary object.
-      (let ((dict (srecode-dictionary
-                  major-mode
+      (let ((dict (make-instance
+                   'srecode-dictionary
                   :buffer   buffer
                   :parent   parent
                   :namehash (make-hash-table :test 'equal